home *** CD-ROM | disk | FTP | other *** search
/ jppd.dyndns.org / jppd.dyndns.org.tar / jppd.dyndns.org / QUERYPRO / Impressora_PDF / CuteWriter.exe / {tmp} / Driver / x64 / PSCRIPT5.DLL / 1033 / 259 / 19 < prev    next >
Text File  |  2006-11-02  |  2KB  |  25 lines
  1. %%BeginResource: file Pscript_Win_GdiObject_L2 5.0 0
  2. /GDIBWPatternDict 25 dict @ `/PatternType 1 d/PaintType 1 d/RepsV 1 d/RepsH 1 d
  3. /BBox[0 0 RepsH 1]d/TilingType 1 d/XStep 1 d/YStep 1 d/Height 8 RepsV mul d
  4. /Width 8 d/mx[Width 0 0 Height neg 0 Height]d/FGnd null d/BGnd null d
  5. /SetBGndFGnd{BGnd null ne{BGnd aload ! scol BBox aload ! 2 ^ sub ~ 3 ^ sub ~
  6. rf}if FGnd null ne{FGnd aload ! scol}if}b/PaintProc{` SetBGndFGnd RepsH{Width
  7. Height F mx PaintData imagemask Width 0 +}repeat E}b E d/mp/makepattern , d
  8. /build_pattern{CTMsave GDIBWPatternMx setmatrix/nupangle where{! nupangle -90
  9. eq{nupangle R}if}if GDIBWPatternDict @ ` Width Height ne{Width Height gt{Width
  10. Height V 1}{1 Height Width V}? +S}if xOrg yOrg E matrix + mp CTMrestore}b/hbf
  11. {setpattern}b/hf{:/fEOFill ~ d ~ ! setpattern fEOFill{O}{L}? ;}b/pbf{: !
  12. /fEOFill ~ d GDIBWPatternDict `/yOrg ~ d/xOrg ~ d/PaintData ~ d/OutputBPP ~ d
  13. /Height ~ d/Width ~ d/PaintType 1 d/PatternType 1 d/TilingType 1 d/BBox[0 0
  14. Width Height]d/XStep Width d/YStep Height d/mx xOrg yOrg matrix + d 20 dict @ `
  15. /ImageType 1 d/Width Width d/Height Height d/ImageMatrix[1 0 0 1 0 0]d
  16. /BitsPerComponent 8 d OutputBPP 24 eq{/Decode[0 1 0 1 0 1]d}{OutputBPP 8 eq{
  17. /Decode[0 1]d}{/Decode[0 1 0 1 0 1 0 1]d}?}?/DataSource{PaintData}d E/ImageDict
  18. ~ d/PaintProc{` ImageDict image E}b & mx makepattern setpattern E fEOFill{O}{L}
  19. ? ;}b/mask_pbf{:/fEOFill ~ d 20 dict `/yOrg ~ d/xOrg ~ d/PaintData ~ d/Height ~
  20. d/Width ~ d/PatternType 1 d/PaintType 2 d/TilingType 1 d/BBox[0 0 Width Height]
  21. d/XStep Width d/YStep Height d/mx xOrg yOrg matrix + d/PaintProc{` Width Height
  22. T 1 1 dtransform abs ~ abs ~ 0 0 3 -1 $ 0 0 6 array astore{PaintData}imagemask
  23. E}b & mx makepattern setpattern E fEOFill{O}{L}? ;}b
  24. %%EndResource
  25.